3.2523 \(\int x^{-1-n} (a+b x^n) \, dx\)

Optimal. Leaf size=16 \[ b \log (x)-\frac {a x^{-n}}{n} \]

[Out]

-a/n/(x^n)+b*ln(x)

________________________________________________________________________________________

Rubi [A]  time = 0.01, antiderivative size = 16, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 1, integrand size = 15, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.067, Rules used = {14} \[ b \log (x)-\frac {a x^{-n}}{n} \]

Antiderivative was successfully verified.

[In]

Int[x^(-1 - n)*(a + b*x^n),x]

[Out]

-(a/(n*x^n)) + b*Log[x]

Rule 14

Int[(u_)*((c_.)*(x_))^(m_.), x_Symbol] :> Int[ExpandIntegrand[(c*x)^m*u, x], x] /; FreeQ[{c, m}, x] && SumQ[u]
&&  !LinearQ[u, x] &&  !MatchQ[u, (a_) + (b_.)*(v_) /; FreeQ[{a, b}, x] && InverseFunctionQ[v]]

Rubi steps

\begin {align*} \int x^{-1-n} \left (a+b x^n\right ) \, dx &=\int \left (\frac {b}{x}+a x^{-1-n}\right ) \, dx\\ &=-\frac {a x^{-n}}{n}+b \log (x)\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.01, size = 16, normalized size = 1.00 \[ b \log (x)-\frac {a x^{-n}}{n} \]

Antiderivative was successfully verified.

[In]

Integrate[x^(-1 - n)*(a + b*x^n),x]

[Out]

-(a/(n*x^n)) + b*Log[x]

________________________________________________________________________________________

fricas [A]  time = 0.57, size = 21, normalized size = 1.31 \[ \frac {b n x^{n} \log \relax (x) - a}{n x^{n}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(x^(-1-n)*(a+b*x^n),x, algorithm="fricas")

[Out]

(b*n*x^n*log(x) - a)/(n*x^n)

________________________________________________________________________________________

giac [A]  time = 0.18, size = 21, normalized size = 1.31 \[ \frac {b n x^{n} \log \relax (x) - a}{n x^{n}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(x^(-1-n)*(a+b*x^n),x, algorithm="giac")

[Out]

(b*n*x^n*log(x) - a)/(n*x^n)

________________________________________________________________________________________

maple [A]  time = 0.01, size = 25, normalized size = 1.56 \[ \left (b \,{\mathrm e}^{n \ln \relax (x )} \ln \relax (x )-\frac {a}{n}\right ) {\mathrm e}^{-n \ln \relax (x )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(x^(-1-n)*(b*x^n+a),x)

[Out]

(b*ln(x)*exp(n*ln(x))-a/n)/exp(n*ln(x))

________________________________________________________________________________________

maxima [A]  time = 0.67, size = 16, normalized size = 1.00 \[ b \log \relax (x) - \frac {a}{n x^{n}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(x^(-1-n)*(a+b*x^n),x, algorithm="maxima")

[Out]

b*log(x) - a/(n*x^n)

________________________________________________________________________________________

mupad [B]  time = 1.41, size = 29, normalized size = 1.81 \[ \left \{\begin {array}{cl} \ln \relax (x)\,\left (a+b\right ) & \text {\ if\ \ }n=0\\ b\,\ln \relax (x)-\frac {a}{n\,x^n} & \text {\ if\ \ }n\neq 0 \end {array}\right . \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((a + b*x^n)/x^(n + 1),x)

[Out]

piecewise(n == 0, log(x)*(a + b), n ~= 0, b*log(x) - a/(n*x^n))

________________________________________________________________________________________

sympy [A]  time = 12.86, size = 107, normalized size = 6.69 \[ \begin {cases} a x + b \log {\relax (x )} & \text {for}\: n = -1 \\\left (a + b\right ) \log {\relax (x )} & \text {for}\: n = 0 \\- \frac {a n}{n^{2} x^{n} + n x^{n}} - \frac {a}{n^{2} x^{n} + n x^{n}} + \frac {b n^{2} x^{n} \log {\relax (x )}}{n^{2} x^{n} + n x^{n}} + \frac {b n x^{n} \log {\relax (x )}}{n^{2} x^{n} + n x^{n}} + \frac {b n x^{n}}{n^{2} x^{n} + n x^{n}} & \text {otherwise} \end {cases} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(x**(-1-n)*(a+b*x**n),x)

[Out]

Piecewise((a*x + b*log(x), Eq(n, -1)), ((a + b)*log(x), Eq(n, 0)), (-a*n/(n**2*x**n + n*x**n) - a/(n**2*x**n +
n*x**n) + b*n**2*x**n*log(x)/(n**2*x**n + n*x**n) + b*n*x**n*log(x)/(n**2*x**n + n*x**n) + b*n*x**n/(n**2*x**
n + n*x**n), True))

________________________________________________________________________________________